home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / bbsutil / dlx70bbs.zip / DLX70SRC.ZIP / LOAD.INT < prev    next >
Text File  |  1994-01-19  |  12KB  |  527 lines
  1. {DLX Bulletin Board System V7.0
  2.  
  3.  FREEWARE NOTICE
  4.  
  5.  DLX V7.0 is placed in the public domain by its author, Richard Gillmann.
  6.  Anyone who wishes to may run the program, copy it, or modify it for
  7.  any purpose, including commercial gain.}
  8.  
  9. INTERFACE; UNIT load (qair,essay,order,null_txt,
  10.   top_txt,
  11.   get_userid_txt,
  12.   get_pw_txt,
  13.   bad_userid_txt,
  14.   bad_pw_txt,
  15.   prime_time_txt,
  16.   time_limit_txt,
  17.   pitch_txt,
  18.   continue_txt,
  19.   pitch2_txt,
  20.   real_name_txt,
  21.   real_street_txt,
  22.   real_city_txt,
  23.   real_phone_txt,
  24.   your_real_txt,
  25.   qaire_header_txt,
  26.   wnm_txt,
  27.   what_city_txt,
  28.   what_state_txt,
  29.   yn_txt,
  30.   cor_txt,
  31.   what_gender_txt,
  32.   wpf_txt,
  33.   how_old_txt,
  34.   what_height_txt,
  35.   what_weight_txt,
  36.   your_age_etc_txt,
  37.   enter_pagesize_txt,
  38.   nextq_txt,
  39.   mustbnum_txt,
  40.   filing_txt,
  41.   cannot_file_txt,
  42.   given_out_txt,
  43.   enter_pw_txt,
  44.   bad_pw_length_txt,
  45.   your_code_txt,
  46.   entering_txt,
  47.   glad_txt,
  48.   user_greeting_txt,
  49.   main_menu_txt,
  50.   dunno_txt,
  51.   main_menu_list_txt,
  52.   answer_again_txt,
  53.   reans_essay_txt,
  54.   reans_mult_txt,
  55.   browse_head_txt,
  56.   file_number_txt,
  57.   browse_txt,
  58.   chat_txt,
  59.   facts_txt,
  60.   goodbye_menu_txt,
  61.   farewell_txt,
  62.   match_parameters_txt,
  63.   match_menu_txt,
  64.   lowest_age_txt,
  65.   highest_age_txt,
  66.   last_called_txt,
  67.   least_times_txt,
  68.   match_gender_txt,
  69.   match_pref_txt,
  70.   match_header_txt,
  71.   match_line_txt,
  72.   userlog_head_txt,
  73.   userlog_line_txt,
  74.   send_private_txt,
  75.   to_from_txt,
  76.   subject_txt,
  77.   no_slots_txt,
  78.   enter_subject_txt,
  79.   enter_body_txt,
  80.   send_line_txt,
  81.   msg_cancelled_txt,
  82.   send_menu_txt,
  83.   send_menu_list_txt,
  84.   too_long_txt,
  85.   sending_txt,
  86.   mail_sent_txt,
  87.   mail_not_sent_txt,
  88.   msg_held_txt,
  89.   which_canned_txt,
  90.   what_line_txt,
  91.   sendmail_line_txt,
  92.   bad_line_number_txt,
  93.   msg_title_txt,
  94.   no_mail_txt,
  95.   msg_header_txt,
  96.   msg_header_deleted_txt,
  97.   which_msg_txt,
  98.   invalid_msg_txt,
  99.   read_menu_txt,
  100.   msg_deleted_txt,
  101.   msg_not_deleted_txt,
  102.   fetching_txt,
  103.   undelete_prompt_txt,
  104.   msg_undeleted_txt,
  105.   pubmail_header_txt,
  106.   pubmail_line_txt,
  107.   pubmail_trailer_txt,
  108.   select_category_txt,
  109.   bad_category_txt,
  110.   pubcat_menu_txt,
  111.   category_menu_txt,
  112.   who_to_txt,
  113.   pub_to_from_txt,
  114.   pub_sending_txt,
  115.   pubmail_sent_txt,
  116.   pubmail_held_txt,
  117.   pubread_head_txt,
  118.   which_pubmsg_txt,
  119.   which_anon_txt,
  120.   which_pubmsg2_txt,
  121.   pubmsg_head_txt,
  122.   pubmsg_deleted_txt,
  123.   pubmsg_held_txt,
  124.   pubscan_head_txt,
  125.   delete_which_txt,
  126.   hold_which_txt,
  127.   delete_line_txt,
  128.   line_deleted_txt,
  129.   edit_which_txt,
  130.   enter_new_line_txt,
  131.   replace_line_txt,
  132.   text_old_txt,
  133.   text_new_txt,
  134.   you_picked_txt,
  135.   want_questions_txt,
  136.   special_qaire_txt,
  137.   read_access_txt,
  138.   bio_header_txt,
  139.   see_biogs_txt,
  140.   arrow_txt,
  141.   ordr_header_txt,
  142.   who_header_txt,
  143.   who_line_txt,
  144.   date_time_txt,
  145.   delete_user_txt,
  146.   user_delete_txt,
  147.   user_deleted_txt,
  148.   change_level_txt,
  149.   enter_level_txt,
  150.   bad_level_txt,
  151.   level_changed_txt,
  152.   kill_line_txt,
  153.   line_kill_txt,
  154.   bad_line_txt,
  155.   line_killed_txt,
  156.   chat_target_txt,
  157.   busy_txt,
  158.   entering_chat_txt,
  159.   exiting_chat_txt,
  160.   reset_time_txt,
  161.   reset_really_txt,
  162.   time_reset_txt,
  163.   send_junkmail_txt,
  164.   junkmail_sent_txt,
  165.   delete_old_txt,
  166.   new_mail_txt,
  167.   new_level_txt,
  168.   change_mbx_txt,
  169.   mbx_size_txt,
  170.   size_changed_txt,
  171.   bad_size_txt,
  172.   lounge_header_txt,
  173.   lounge_menu_txt,
  174.   lounge_help_txt,
  175.   nochat_txt,
  176.   lochat_txt,
  177.   chat_info_txt,
  178.   lounge_exit_txt,
  179.   file_error_txt,
  180.   on_another_line_txt,
  181.   wanna_chat_txt,
  182.   room_for_txt,
  183.   no_new_users_txt,
  184.   hi_sailor_txt,
  185.   nopage_txt,
  186.   libr_welcome_txt,
  187.   libr_menu_txt,
  188.   which_subdir_txt,
  189.   new_subdir_txt,
  190.   bad_subdir_txt,
  191.   libr3_menu_txt,
  192.   libr3_help_txt,
  193.   which_protocol_txt,
  194.   protocol_help_txt,
  195.   file2transfer_txt,
  196.   au_txt,
  197.   upload_error_txt,
  198.   nofile_txt,
  199.   download_error_txt,
  200.   no_diskspace_txt,
  201.   io_error_txt,
  202.   bad_filename_txt,
  203.   menu_post_txt,
  204.   download_post_txt,
  205.   d4dnload_txt,
  206.   u4upload_txt,
  207.   begin_ascii_dl_txt,
  208.   begin_download_txt,
  209.   download_end_txt,
  210.   begin_upload_txt,
  211.   upload_end_txt,
  212.   protocol_error_txt,
  213.   describe_file_txt,
  214.   file2big_txt,
  215.   minutes_left_txt,
  216.   shutdown_txt,
  217.   bad_format_txt,
  218.   nonew1s_txt,
  219.   new1s_txt,
  220.   unanswer_txt,
  221.   enter_multiple_txt,
  222.   qaire_cleared_txt,
  223.   bad_multiple_txt,
  224.   recycle_txt,
  225.   good_recycle_txt,
  226.   bad_recycle_txt,
  227.   hold_error_txt,
  228.   wrn_txt,
  229.   cwn_txt,
  230.   undel_user_txt,
  231.   user_undel_txt,
  232.   good_userid_txt,
  233.   user_undeled_txt,
  234.   gce_txt,
  235.   gch_txt,
  236.   gcx_txt,
  237.   gcx2_txt,
  238.   new_txt,
  239.   gcl_txt,
  240.   old_txt,
  241.   squ_txt,
  242.   sta_txt,
  243.   gst_txt,
  244.   dbw_txt,
  245.   dbc_txt,
  246.   dbb_txt,
  247.   dbk_txt,
  248.   shortxt,
  249.   moretxt,
  250.   dbx_txt,
  251.   ofl_txt,
  252.   ok_txt,
  253.   more_txt,
  254.   nomem_txt,
  255.   which_channel_txt,
  256.   bad_fileno_txt,
  257.   dbm_txt,
  258.   ubumped_txt,
  259.   pub_title_txt,
  260.   pub_header_txt,
  261.   pub_held_txt,
  262.   pub_del_txt);
  263.  
  264. USES types;
  265.  
  266. var
  267.   qair : array[1..number_of_qaires] of questions;
  268.   essay,order : essays;
  269.  
  270. var
  271.   null_txt : para;
  272.   top_txt : para; {keep this one second or change loadinit.pas}
  273.   get_userid_txt : para;
  274.   get_pw_txt : para;
  275.   bad_userid_txt : para;
  276.   bad_pw_txt : para;
  277.   prime_time_txt : para;
  278.   time_limit_txt : para;
  279.   pitch_txt : para;
  280.   continue_txt : para;
  281.   pitch2_txt : para;
  282.   real_name_txt : para;
  283.   real_street_txt : para;
  284.   real_city_txt : para;
  285.   real_phone_txt : para;
  286.   your_real_txt : para;
  287.   qaire_header_txt : para;
  288.   wnm_txt : para;
  289.   what_city_txt : para;
  290.   what_state_txt : para;
  291.   yn_txt : para;
  292.   cor_txt : para;
  293.   what_gender_txt : para;
  294.   wpf_txt : para;
  295.   how_old_txt : para;
  296.   what_height_txt : para;
  297.   what_weight_txt : para;
  298.   your_age_etc_txt : para;
  299.   enter_pagesize_txt : para;
  300.   nextq_txt : para;
  301.   mustbnum_txt : para;
  302.   filing_txt : para;
  303.   cannot_file_txt : para;
  304.   given_out_txt : para;
  305.   enter_pw_txt : para;
  306.   bad_pw_length_txt : para;
  307.   your_code_txt : para;
  308.   entering_txt : para;
  309.   glad_txt : para;
  310.   user_greeting_txt : para;
  311.   main_menu_txt : para;
  312.   dunno_txt : para;
  313.   main_menu_list_txt : para;
  314.   answer_again_txt : para;
  315.   reans_essay_txt : para;
  316.   reans_mult_txt : para;
  317.   browse_head_txt : para;
  318.   file_number_txt : para;
  319.   browse_txt : para;
  320.   chat_txt : para;
  321.   facts_txt : para;
  322.   goodbye_menu_txt : para;
  323.   farewell_txt : para;
  324.   match_parameters_txt : para;
  325.   match_menu_txt : para;
  326.   lowest_age_txt : para;
  327.   highest_age_txt : para;
  328.   last_called_txt : para;
  329.   least_times_txt : para;
  330.   match_gender_txt : para;
  331.   match_pref_txt : para;
  332.   match_header_txt : para;
  333.   match_line_txt : para;
  334.   userlog_head_txt : para;
  335.   userlog_line_txt : para;
  336.   send_private_txt : para;
  337.   to_from_txt : para;
  338.   subject_txt : para;
  339.   no_slots_txt : para;
  340.   enter_subject_txt : para;
  341.   enter_body_txt : para;
  342.   send_line_txt : para;
  343.   msg_cancelled_txt : para;
  344.   send_menu_txt : para;
  345.   send_menu_list_txt : para;
  346.   too_long_txt : para;
  347.   sending_txt : para;
  348.   mail_sent_txt : para;
  349.   mail_not_sent_txt : para;
  350.   msg_held_txt : para;
  351.   which_canned_txt : para;
  352.   what_line_txt : para;
  353.   sendmail_line_txt : para;
  354.   bad_line_number_txt : para;
  355.   msg_title_txt : para;
  356.   no_mail_txt : para;
  357.   msg_header_txt : para;
  358.   msg_header_deleted_txt : para;
  359.   which_msg_txt : para;
  360.   invalid_msg_txt : para;
  361.   read_menu_txt : para;
  362.   msg_deleted_txt : para;
  363.   msg_not_deleted_txt : para;
  364.   fetching_txt : para;
  365.   undelete_prompt_txt : para;
  366.   msg_undeleted_txt : para;
  367.   pubmail_header_txt : para;
  368.   pubmail_line_txt : para;
  369.   pubmail_trailer_txt : para;
  370.   select_category_txt : para;
  371.   bad_category_txt : para;
  372.   pubcat_menu_txt : para;
  373.   category_menu_txt : para;
  374.   who_to_txt : para;
  375.   pub_to_from_txt : para;
  376.   pub_sending_txt : para;
  377.   pubmail_sent_txt : para;
  378.   pubmail_held_txt : para;
  379.   pubread_head_txt : para;
  380.   which_pubmsg_txt : para;
  381.   which_anon_txt : para;
  382.   which_pubmsg2_txt : para;
  383.   pubmsg_head_txt : para;
  384.   pubmsg_deleted_txt : para;
  385.   pubmsg_held_txt : para;
  386.   pubscan_head_txt : para;
  387.   delete_which_txt : para;
  388.   hold_which_txt : para;
  389.   delete